UnitlmdnonvA
Declaration
TLMDOnNewComponentEvent = procedure(Sender:TObject; aComponent:TComponent) of object;